3.35 \(\int F^{c (a+b x)} (e \cos (d+e x)+b c \log (F) \sin (d+e x)) \, dx\)

Optimal. Leaf size=16 \[ \sin (d+e x) F^{c (a+b x)} \]

[Out]

F^(c*(a + b*x))*Sin[d + e*x]

________________________________________________________________________________________

Rubi [A]  time = 0.0293524, antiderivative size = 16, normalized size of antiderivative = 1., number of steps used = 1, number of rules used = 1, integrand size = 30, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0.033, Rules used = {2288} \[ \sin (d+e x) F^{c (a+b x)} \]

Antiderivative was successfully verified.

[In]

Int[F^(c*(a + b*x))*(e*Cos[d + e*x] + b*c*Log[F]*Sin[d + e*x]),x]

[Out]

F^(c*(a + b*x))*Sin[d + e*x]

Rule 2288

Int[(y_.)*(F_)^(u_)*((v_) + (w_)), x_Symbol] :> With[{z = (v*y)/(Log[F]*D[u, x])}, Simp[F^u*z, x] /; EqQ[D[z,
x], w*y]] /; FreeQ[F, x]

Rubi steps

\begin{align*} \int F^{c (a+b x)} (e \cos (d+e x)+b c \log (F) \sin (d+e x)) \, dx &=F^{c (a+b x)} \sin (d+e x)\\ \end{align*}

Mathematica [A]  time = 0.0267141, size = 16, normalized size = 1. \[ \sin (d+e x) F^{c (a+b x)} \]

Antiderivative was successfully verified.

[In]

Integrate[F^(c*(a + b*x))*(e*Cos[d + e*x] + b*c*Log[F]*Sin[d + e*x]),x]

[Out]

F^(c*(a + b*x))*Sin[d + e*x]

________________________________________________________________________________________

Maple [B]  time = 0.015, size = 268, normalized size = 16.8 \begin{align*}{e \left ({\frac{bc\ln \left ( F \right ){{\rm e}^{c \left ( bx+a \right ) \ln \left ( F \right ) }}}{{e}^{2}+{b}^{2}{c}^{2} \left ( \ln \left ( F \right ) \right ) ^{2}}}+2\,{\frac{e{{\rm e}^{c \left ( bx+a \right ) \ln \left ( F \right ) }}\tan \left ( d/2+1/2\,ex \right ) }{{e}^{2}+{b}^{2}{c}^{2} \left ( \ln \left ( F \right ) \right ) ^{2}}}-{\frac{bc\ln \left ( F \right ){{\rm e}^{c \left ( bx+a \right ) \ln \left ( F \right ) }}}{{e}^{2}+{b}^{2}{c}^{2} \left ( \ln \left ( F \right ) \right ) ^{2}} \left ( \tan \left ({\frac{d}{2}}+{\frac{ex}{2}} \right ) \right ) ^{2}} \right ) \left ( 1+ \left ( \tan \left ({\frac{d}{2}}+{\frac{ex}{2}} \right ) \right ) ^{2} \right ) ^{-1}}+{bc\ln \left ( F \right ) \left ({\frac{e{{\rm e}^{c \left ( bx+a \right ) \ln \left ( F \right ) }}}{{e}^{2}+{b}^{2}{c}^{2} \left ( \ln \left ( F \right ) \right ) ^{2}} \left ( \tan \left ({\frac{d}{2}}+{\frac{ex}{2}} \right ) \right ) ^{2}}-{\frac{e{{\rm e}^{c \left ( bx+a \right ) \ln \left ( F \right ) }}}{{e}^{2}+{b}^{2}{c}^{2} \left ( \ln \left ( F \right ) \right ) ^{2}}}+2\,{\frac{bc\ln \left ( F \right ){{\rm e}^{c \left ( bx+a \right ) \ln \left ( F \right ) }}\tan \left ( d/2+1/2\,ex \right ) }{{e}^{2}+{b}^{2}{c}^{2} \left ( \ln \left ( F \right ) \right ) ^{2}}} \right ) \left ( 1+ \left ( \tan \left ({\frac{d}{2}}+{\frac{ex}{2}} \right ) \right ) ^{2} \right ) ^{-1}} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(F^(c*(b*x+a))*(e*cos(e*x+d)+b*c*ln(F)*sin(e*x+d)),x)

[Out]

e*(ln(F)*b*c/(e^2+b^2*c^2*ln(F)^2)*exp(c*(b*x+a)*ln(F))+2/(e^2+b^2*c^2*ln(F)^2)*e*exp(c*(b*x+a)*ln(F))*tan(1/2
*d+1/2*e*x)-ln(F)*b*c/(e^2+b^2*c^2*ln(F)^2)*exp(c*(b*x+a)*ln(F))*tan(1/2*d+1/2*e*x)^2)/(1+tan(1/2*d+1/2*e*x)^2
)+b*c*ln(F)*(1/(e^2+b^2*c^2*ln(F)^2)*e*exp(c*(b*x+a)*ln(F))*tan(1/2*d+1/2*e*x)^2-1/(e^2+b^2*c^2*ln(F)^2)*e*exp
(c*(b*x+a)*ln(F))+2*ln(F)*b*c/(e^2+b^2*c^2*ln(F)^2)*exp(c*(b*x+a)*ln(F))*tan(1/2*d+1/2*e*x))/(1+tan(1/2*d+1/2*
e*x)^2)

________________________________________________________________________________________

Maxima [B]  time = 1.14917, size = 529, normalized size = 33.06 \begin{align*} -\frac{{\left ({\left (F^{a c} b c \log \left (F\right ) \sin \left (d\right ) + F^{a c} e \cos \left (d\right )\right )} F^{b c x} \cos \left (e x + 2 \, d\right ) -{\left (F^{a c} b c \log \left (F\right ) \sin \left (d\right ) - F^{a c} e \cos \left (d\right )\right )} F^{b c x} \cos \left (e x\right ) -{\left (F^{a c} b c \cos \left (d\right ) \log \left (F\right ) - F^{a c} e \sin \left (d\right )\right )} F^{b c x} \sin \left (e x + 2 \, d\right ) -{\left (F^{a c} b c \cos \left (d\right ) \log \left (F\right ) + F^{a c} e \sin \left (d\right )\right )} F^{b c x} \sin \left (e x\right )\right )} b c \log \left (F\right )}{2 \,{\left (b^{2} c^{2} \cos \left (d\right )^{2} \log \left (F\right )^{2} + b^{2} c^{2} \log \left (F\right )^{2} \sin \left (d\right )^{2} +{\left (\cos \left (d\right )^{2} + \sin \left (d\right )^{2}\right )} e^{2}\right )}} + \frac{{\left ({\left (F^{a c} b c \cos \left (d\right ) \log \left (F\right ) - F^{a c} e \sin \left (d\right )\right )} F^{b c x} \cos \left (e x + 2 \, d\right ) +{\left (F^{a c} b c \cos \left (d\right ) \log \left (F\right ) + F^{a c} e \sin \left (d\right )\right )} F^{b c x} \cos \left (e x\right ) +{\left (F^{a c} b c \log \left (F\right ) \sin \left (d\right ) + F^{a c} e \cos \left (d\right )\right )} F^{b c x} \sin \left (e x + 2 \, d\right ) -{\left (F^{a c} b c \log \left (F\right ) \sin \left (d\right ) - F^{a c} e \cos \left (d\right )\right )} F^{b c x} \sin \left (e x\right )\right )} e}{2 \,{\left (b^{2} c^{2} \cos \left (d\right )^{2} \log \left (F\right )^{2} + b^{2} c^{2} \log \left (F\right )^{2} \sin \left (d\right )^{2} +{\left (\cos \left (d\right )^{2} + \sin \left (d\right )^{2}\right )} e^{2}\right )}} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(F^(c*(b*x+a))*(e*cos(e*x+d)+b*c*log(F)*sin(e*x+d)),x, algorithm="maxima")

[Out]

-1/2*((F^(a*c)*b*c*log(F)*sin(d) + F^(a*c)*e*cos(d))*F^(b*c*x)*cos(e*x + 2*d) - (F^(a*c)*b*c*log(F)*sin(d) - F
^(a*c)*e*cos(d))*F^(b*c*x)*cos(e*x) - (F^(a*c)*b*c*cos(d)*log(F) - F^(a*c)*e*sin(d))*F^(b*c*x)*sin(e*x + 2*d)
- (F^(a*c)*b*c*cos(d)*log(F) + F^(a*c)*e*sin(d))*F^(b*c*x)*sin(e*x))*b*c*log(F)/(b^2*c^2*cos(d)^2*log(F)^2 + b
^2*c^2*log(F)^2*sin(d)^2 + (cos(d)^2 + sin(d)^2)*e^2) + 1/2*((F^(a*c)*b*c*cos(d)*log(F) - F^(a*c)*e*sin(d))*F^
(b*c*x)*cos(e*x + 2*d) + (F^(a*c)*b*c*cos(d)*log(F) + F^(a*c)*e*sin(d))*F^(b*c*x)*cos(e*x) + (F^(a*c)*b*c*log(
F)*sin(d) + F^(a*c)*e*cos(d))*F^(b*c*x)*sin(e*x + 2*d) - (F^(a*c)*b*c*log(F)*sin(d) - F^(a*c)*e*cos(d))*F^(b*c
*x)*sin(e*x))*e/(b^2*c^2*cos(d)^2*log(F)^2 + b^2*c^2*log(F)^2*sin(d)^2 + (cos(d)^2 + sin(d)^2)*e^2)

________________________________________________________________________________________

Fricas [A]  time = 0.47312, size = 41, normalized size = 2.56 \begin{align*} F^{b c x + a c} \sin \left (e x + d\right ) \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(F^(c*(b*x+a))*(e*cos(e*x+d)+b*c*log(F)*sin(e*x+d)),x, algorithm="fricas")

[Out]

F^(b*c*x + a*c)*sin(e*x + d)

________________________________________________________________________________________

Sympy [A]  time = 3.95878, size = 17, normalized size = 1.06 \begin{align*} F^{a c} F^{b c x} \sin{\left (d + e x \right )} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(F**(c*(b*x+a))*(e*cos(e*x+d)+b*c*ln(F)*sin(e*x+d)),x)

[Out]

F**(a*c)*F**(b*c*x)*sin(d + e*x)

________________________________________________________________________________________

Giac [C]  time = 1.28385, size = 1710, normalized size = 106.88 \begin{align*} \text{result too large to display} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(F^(c*(b*x+a))*(e*cos(e*x+d)+b*c*log(F)*sin(e*x+d)),x, algorithm="giac")

[Out]

(2*b*c*cos(1/2*pi*b*c*x*sgn(F) - 1/2*pi*b*c*x + 1/2*pi*a*c*sgn(F) - 1/2*pi*a*c + x*e + d)*log(abs(F))/(4*b^2*c
^2*log(abs(F))^2 + (pi*b*c*sgn(F) - pi*b*c + 2*e)^2) + (pi*b*c*sgn(F) - pi*b*c + 2*e)*sin(1/2*pi*b*c*x*sgn(F)
- 1/2*pi*b*c*x + 1/2*pi*a*c*sgn(F) - 1/2*pi*a*c + x*e + d)/(4*b^2*c^2*log(abs(F))^2 + (pi*b*c*sgn(F) - pi*b*c
+ 2*e)^2))*e^(b*c*x*log(abs(F)) + a*c*log(abs(F)) + 1) + (2*b*c*cos(1/2*pi*b*c*x*sgn(F) - 1/2*pi*b*c*x + 1/2*p
i*a*c*sgn(F) - 1/2*pi*a*c - x*e - d)*log(abs(F))/(4*b^2*c^2*log(abs(F))^2 + (pi*b*c*sgn(F) - pi*b*c - 2*e)^2)
+ (pi*b*c*sgn(F) - pi*b*c - 2*e)*sin(1/2*pi*b*c*x*sgn(F) - 1/2*pi*b*c*x + 1/2*pi*a*c*sgn(F) - 1/2*pi*a*c - x*e
 - d)/(4*b^2*c^2*log(abs(F))^2 + (pi*b*c*sgn(F) - pi*b*c - 2*e)^2))*e^(b*c*x*log(abs(F)) + a*c*log(abs(F)) + 1
) - 1/2*I*(-2*I*e^(1/2*I*pi*b*c*x*sgn(F) - 1/2*I*pi*b*c*x + 1/2*I*pi*a*c*sgn(F) - 1/2*I*pi*a*c + I*x*e + I*d)/
(2*I*pi*b*c*sgn(F) - 2*I*pi*b*c + 4*b*c*log(abs(F)) + 4*I*e) + 2*I*e^(-1/2*I*pi*b*c*x*sgn(F) + 1/2*I*pi*b*c*x
- 1/2*I*pi*a*c*sgn(F) + 1/2*I*pi*a*c - I*x*e - I*d)/(-2*I*pi*b*c*sgn(F) + 2*I*pi*b*c + 4*b*c*log(abs(F)) - 4*I
*e))*e^(b*c*x*log(abs(F)) + a*c*log(abs(F)) + 1) - 1/2*I*(-2*I*e^(1/2*I*pi*b*c*x*sgn(F) - 1/2*I*pi*b*c*x + 1/2
*I*pi*a*c*sgn(F) - 1/2*I*pi*a*c - I*x*e - I*d)/(2*I*pi*b*c*sgn(F) - 2*I*pi*b*c + 4*b*c*log(abs(F)) - 4*I*e) +
2*I*e^(-1/2*I*pi*b*c*x*sgn(F) + 1/2*I*pi*b*c*x - 1/2*I*pi*a*c*sgn(F) + 1/2*I*pi*a*c + I*x*e + I*d)/(-2*I*pi*b*
c*sgn(F) + 2*I*pi*b*c + 4*b*c*log(abs(F)) + 4*I*e))*e^(b*c*x*log(abs(F)) + a*c*log(abs(F)) + 1) - I*(b*c*e^(1/
2*I*pi*b*c*x*sgn(F) - 1/2*I*pi*b*c*x + 1/2*I*pi*a*c*sgn(F) - 1/2*I*pi*a*c + I*x*e + I*d)*log(F)/(2*I*pi*b*c*sg
n(F) - 2*I*pi*b*c + 4*b*c*log(abs(F)) + 4*I*e) - b*c*e^(-1/2*I*pi*b*c*x*sgn(F) + 1/2*I*pi*b*c*x - 1/2*I*pi*a*c
*sgn(F) + 1/2*I*pi*a*c - I*x*e - I*d)*log(F)/(-2*I*pi*b*c*sgn(F) + 2*I*pi*b*c + 4*b*c*log(abs(F)) - 4*I*e))*e^
(b*c*x*log(abs(F)) + a*c*log(abs(F))) + 1/2*(2*I*b*c*e^(1/2*I*pi*b*c*x*sgn(F) - 1/2*I*pi*b*c*x + 1/2*I*pi*a*c*
sgn(F) - 1/2*I*pi*a*c + I*x*e + I*d)*log(F)/(2*I*pi*b*c*sgn(F) - 2*I*pi*b*c + 4*b*c*log(abs(F)) + 4*I*e) + 2*I
*b*c*e^(-1/2*I*pi*b*c*x*sgn(F) + 1/2*I*pi*b*c*x - 1/2*I*pi*a*c*sgn(F) + 1/2*I*pi*a*c - I*x*e - I*d)*log(F)/(-2
*I*pi*b*c*sgn(F) + 2*I*pi*b*c + 4*b*c*log(abs(F)) - 4*I*e))*e^(b*c*x*log(abs(F)) + a*c*log(abs(F))) + I*(b*c*e
^(1/2*I*pi*b*c*x*sgn(F) - 1/2*I*pi*b*c*x + 1/2*I*pi*a*c*sgn(F) - 1/2*I*pi*a*c - I*x*e - I*d)*log(F)/(2*I*pi*b*
c*sgn(F) - 2*I*pi*b*c + 4*b*c*log(abs(F)) - 4*I*e) - b*c*e^(-1/2*I*pi*b*c*x*sgn(F) + 1/2*I*pi*b*c*x - 1/2*I*pi
*a*c*sgn(F) + 1/2*I*pi*a*c + I*x*e + I*d)*log(F)/(-2*I*pi*b*c*sgn(F) + 2*I*pi*b*c + 4*b*c*log(abs(F)) + 4*I*e)
)*e^(b*c*x*log(abs(F)) + a*c*log(abs(F))) + 1/2*(-2*I*b*c*e^(1/2*I*pi*b*c*x*sgn(F) - 1/2*I*pi*b*c*x + 1/2*I*pi
*a*c*sgn(F) - 1/2*I*pi*a*c - I*x*e - I*d)*log(F)/(2*I*pi*b*c*sgn(F) - 2*I*pi*b*c + 4*b*c*log(abs(F)) - 4*I*e)
- 2*I*b*c*e^(-1/2*I*pi*b*c*x*sgn(F) + 1/2*I*pi*b*c*x - 1/2*I*pi*a*c*sgn(F) + 1/2*I*pi*a*c + I*x*e + I*d)*log(F
)/(-2*I*pi*b*c*sgn(F) + 2*I*pi*b*c + 4*b*c*log(abs(F)) + 4*I*e))*e^(b*c*x*log(abs(F)) + a*c*log(abs(F)))